home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 31 / CD Expert nº 31 Unreal Mission Pack I.iso / PetWings / petwings.exe / PetWings.exe / RCDATA / 180 < prev    next >
Text File  |  1999-08-04  |  491b  |  50 lines
  1. STOP 100
  2.  
  3. SET_FRAME 0
  4.  
  5. // Going down
  6. STOP 67
  7.  
  8. // While going up...
  9. STOP 15
  10.  
  11. LABEL 1
  12.  
  13. // Small photon
  14. PLAY_SOUND 15
  15. REPEAT 12
  16. SET_FRAME 0
  17. STOP 1
  18. SET_FRAME 1
  19. STOP 1
  20. SET_FRAME 2
  21. STOP 1
  22. SET_FRAME 1
  23. STOP 1
  24. REPEAT_END
  25.  
  26. // Big photon
  27. PLAY_SOUND 15
  28. REPEAT 12
  29. SET_FRAME 0
  30. STOP 1
  31. SET_FRAME 3
  32. STOP 1
  33. SET_FRAME 4
  34. STOP 1
  35. SET_FRAME 3
  36. STOP 1
  37. REPEAT_END
  38.  
  39. // Lazer
  40. REPEAT 100
  41. SET_FRAME 5
  42. STOP 2
  43. SET_FRAME 6
  44. STOP 2
  45. REPEAT_END
  46.  
  47. SET_FRAME 0
  48. STOP 80
  49.  
  50. GOTO_LABEL 1